home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / scheme / pcscheme / geneva / pcscheme.exe / BIN / GRAPHICS.FSL < prev    next >
Encoding:
Text File  |  1993-11-02  |  18.1 KB  |  422 lines
  1. #!fast-load 4.0 MINIBOOT (sources\s\graphics.s)
  2. h004F 01D8
  3. x0C#!UNASSIGNED
  4. x0ESET-DISTANCES!
  5. x10SET-COORDINATES!
  6. x0CSET-POINT?-!
  7. x0ASET-WORLD!
  8. x0ERESTORE-WORLD!
  9. x0BCLOSE-GRAPH
  10. x0CDETECT-GRAPH
  11. x0EGRAPH-DEFAULTS
  12. x0EGET-GRAPH-MODE
  13. x0EGET-MODE-RANGE
  14. x0AINIT-GRAPH
  15. x13INSTALL-USER-DRIVER
  16. x11INSTALL-USER-FONT
  17. x10RESTORE-CRT-MODE
  18. x0ESET-GRAPH-MODE
  19. x0ESET-WRITE-MODE
  20. x03ARC
  21. x06CIRCLE
  22. x09DRAW-POLY
  23. x07ELLIPSE
  24. x0EGET-ARC-COORDS
  25. x10GET-ASPECT-RATIO
  26. x11GET-LINE-SETTINGS
  27. x04LINE
  28. x08LINE-REL
  29. x07LINE-TO
  30. x07MOVE-TO
  31. x08MOVE-REL
  32. x09RECTANGLE
  33. x10SET-ASPECT-RATIO
  34. x0ESET-LINE-STYLE
  35. x03BAR
  36. x06BAR-3D
  37. x0CFILL-ELLIPSE
  38. x09FILL-POLY
  39. x0AFLOOD-FILL
  40. x10GET-FILL-PATTERN
  41. x11GET-FILL-SETTINGS
  42. x09PIE-SLICE
  43. x06SECTOR
  44. x10SET-FILL-PATTERN
  45. x0ESET-FILL-STYLE
  46. x0CCLEAR-DEVICE
  47. x0FSET-ACTIVE-PAGE
  48. x0FSET-VISUAL-PAGE
  49. x0ECLEAR-VIEWPORT
  50. x11GET-VIEW-SETTINGS
  51. x0CSET-VIEWPORT
  52. x09GET-IMAGE
  53. x0AIMAGE-SIZE
  54. x09PUT-IMAGE
  55. x09GET-PIXEL
  56. x09PUT-PIXEL
  57. x11GET-TEXT-SETTINGS
  58. x08OUT-TEXT
  59. x0BOUT-TEXT-XY
  60. x10SET-TEXT-JUSTIFY
  61. x0ESET-TEXT-STYLE
  62. x12SET-USER-CHAR-SIZE
  63. x09TEXT-SIZE
  64. x0CGET-BK-COLOR
  65. x09GET-COLOR
  66. x13GET-DEFAULT-PALETTE
  67. x0DGET-MAX-COLOR
  68. x0BGET-PALETTE
  69. x10GET-PALETTE-SIZE
  70. x0FSET-ALL-PALETTE
  71. x0CSET-BK-COLOR
  72. x09SET-COLOR
  73. x0BSET-PALETTE
  74. x0FSET-RGB-PALETTE
  75. x0FGRAPH-ERROR-MSG
  76. x0CGRAPH-RESULT
  77. x0FGET-DRIVER-NAME
  78. x0CGET-MAX-MODE
  79. x0AGET-MAX-XY
  80. x0DGET-MODE-NAME
  81. x06GET-XY
  82. t    
  83.   
  84.  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNN;
  85. z
  86. h0025 0087
  87. llx06DETECTi0000llx03CGAi0001llx04MCGAi0002llx03EGAi0003llx05EGA64i0004llx07EGAMONOi0005llx07IBM8514i0006llx08HERCMONOi0007llx06ATT400i0008llx03VGAi0009llx06PC3270i000An
  88. lx08DRIVER-Ln
  89. x08DRIVER-L
  90. llx06CGA-C0i0000llx06CGA-C1i0001llx06CGA-C2i0002llx06CGA-C3i0003llx06CGA-HIi0004llx07MCGA-C0i0000llx07MCGA-C1i0001llx07MCGA-C2i0002llx07MCGA-C3i0003llx08MCGA-MEDi0004llx07MCGA-HIi0005llx06EGA-LOi0000llx06EGA-HIi0001llx08EGA64-LOi0000llx08EGA64-HIi0001llx0AEGAMONO-HIi0003llx06VGA-LOi0000llx07VGA-MEDi0001llx06VGA-HIi0002llx09ATT400-C0i0000llx09ATT400-C1i0001llx09ATT400-C2i0002llx09ATT400-C3i0003llx0AATT400-MEDi0004llx09ATT400-HIi0005llx0BHERCMONO-HIi0000llx09PC3270-HIi0000llx0AIBM8514-LOi0000llx0AIBM8514-HIi0001n
  91. lx06MODE-Ln
  92. x06MODE-L
  93. llx04COPYi0000llx03XORi0001n
  94. lx07WMODE-Ln
  95. x07WMODE-L
  96. llx02ORi0002llx03ANDi0003llx03NOTi0004n
  97. lx07PMODE-Ln
  98. x07PMODE-L
  99. llx05SOLIDi0000llx06DOTTEDi0001llx06CENTERi0002llx06DASHEDi0003llx08USER-BITi0004n
  100. lx06LINE-Ln
  101. x06LINE-L
  102. llx06NORMALi0001llx05THICKi0003n
  103. lx07WIDTH-Ln
  104. x07WIDTH-L
  105. llx05EMPTYi0000llx05SOLIDi0001llx04LINEi0002llx07LTSLASHi0003llx05SLASHi0004llx07BKSLASHi0005llx09LTBKSLASHi0006llx05HATCHi0007llx06XHATCHi0008llx0AINTERLEAVEi0009llx08WIDE-DOTi000Allx09CLOSE-DOTi000Bllx09USER-FILLi000Cn
  106. lx06FILL-Ln
  107. x06FILL-L
  108. llx04LEFTi0000llx06CENTERi0001llx05RIGHTi0002n
  109. lx07HORIZ-Ln
  110. x07HORIZ-L
  111. llx06BOTTOMi0000llx06CENTERi0001llx03TOPi0002n
  112. lx06VERT-Ln
  113. x06VERT-L
  114. llx05HORIZi0000llx04VERTi0001n
  115. lx08DIRECT-Ln
  116. x08DIRECT-L
  117. llx07DEFAULTi0000llx07TRIPLEXi0001llx05SMALLi0002llx0ASANS-SERIFi0003llx06GOTHICi0004llx06SCRIPTi0005llx07SIMPLEXi0006llx0BTRIPLEX-SCRi0007llx07COMPLEXi0008llx08EUROPEANi0009llx04BOLDi000An
  118. lx06FONT-Ln
  119. x06FONT-L
  120. llx05BLACKi0000llx04BLUEi0001llx05GREENi0002llx04CYANi0003llx03REDi0004llx07MAGENTAi0005llx05BROWNi0006llx0ALIGHT-GRAYi0007llx09DARK-GRAYi0008llx0ALIGHT-BLUEi0009llx0BLIGHT-GREENi000Allx0ALIGHT-CYANi000Bllx09LIGHT-REDi000Cllx0DLIGHT-MAGENTAi000Dllx06YELLOWi000Ellx05WHITEi000Fllx09EGA-BLACKi0000llx08EGA-BLUEi0001llx09EGA-GREENi0002llx08EGA-CYANi0003llx07EGA-REDi0004llx0BEGA-MAGENTAi0005llx0EEGA-LIGHT-GRAYi0007llx09EGA-BROWNi0014llx0DEGA-DARK-GRAYi0038llx0EEGA-LIGHT-BLUEi0039llx0FEGA-LIGHT-GREENi003Allx0EEGA-LIGHT-CYANi003Bllx0DEGA-LIGHT-REDi003Cllx11EGA-LIGHT-MAGENTAi003Dllx0AEGA-YELLOWi003Ellx09EGA-WHITEi003Fllx0ABACKGROUNDi0000llx0FCGA-LIGHT-GREENi0001llx0DCGA-LIGHT-REDi0002llx0ACGA-YELLOWi0003llx0ECGA-LIGHT-CYANi0001llx11CGA-LIGHT-MAGENTAi0002llx09CGA-WHITEi0003llx09CGA-GREENi0001llx07CGA-REDi0002llx09CGA-BROWNi0003llx08CGA-CYANi0001llx0BCGA-MAGENTAi0002llx0ECGA-LIGHT-GRAYi0003n
  121. lx07COLOR-Ln
  122. x07COLOR-L
  123. x0FBGI-ENVIRONMENT
  124. t▌▌ ▌     q▌
  125.   ▌
  126. ▌▌ ▌ $▌$(▌(,▌, 0!▌"0#┘4============4$$;
  127. z
  128. h0005 001D
  129. x04CODE
  130. x13CREATE-SCHEME-MACRO
  131. x13%EXPAND-SYNTAX-FORM
  132. lx02ITlx01Ln
  133. lx06LOCATElx02ITllx06ACCESSlx01Llx0FBGI-ENVIRONMENTnn
  134. t< 5  5
  135. z
  136. h0005 001D
  137. x06DECODE
  138. x13CREATE-SCHEME-MACRO
  139. x13%EXPAND-SYNTAX-FORM
  140. lx02ITlx01Ln
  141. lx06ASSQ-Rlx02ITllx06ACCESSlx01Llx0FBGI-ENVIRONMENTnn
  142. t< 5  5
  143. z
  144. h0005 001D
  145. x07CONTROL
  146. x13CREATE-SCHEME-MACRO
  147. x13%EXPAND-SYNTAX-FORM
  148. lx01Xn
  149. lx01+lx01Xli0000n
  150. t< 5  5
  151. z
  152. h0005 001D
  153. x07DRAWING
  154. x13CREATE-SCHEME-MACRO
  155. x13%EXPAND-SYNTAX-FORM
  156. lx01Xn
  157. lx01+lx01Xli0014n
  158. t< 5  5
  159. z
  160. h0005 001D
  161. x07FILLING
  162. x13CREATE-SCHEME-MACRO
  163. x13%EXPAND-SYNTAX-FORM
  164. lx01Xn
  165. lx01+lx01Xli0028n
  166. t< 5  5
  167. z
  168. h0005 001D
  169. x07WINDOWS
  170. x13CREATE-SCHEME-MACRO
  171. x13%EXPAND-SYNTAX-FORM
  172. lx01Xn
  173. lx01+lx01Xli003Cn
  174. t< 5  5
  175. z
  176. h0005 001D
  177. x07TEXTCHR
  178. x13CREATE-SCHEME-MACRO
  179. x13%EXPAND-SYNTAX-FORM
  180. lx01Xn
  181. lx01+lx01Xli0050n
  182. t< 5  5
  183. z
  184. h0005 001D
  185. x07PALETTE
  186. x13CREATE-SCHEME-MACRO
  187. x13%EXPAND-SYNTAX-FORM
  188. lx01Xn
  189. lx01+lx01Xli0064n
  190. t< 5  5
  191. z
  192. h0005 001D
  193. x07QUERIES
  194. x13CREATE-SCHEME-MACRO
  195. x13%EXPAND-SYNTAX-FORM
  196. lx01Xn
  197. lx01+lx01Xli0078n
  198. t< 5  5
  199. z
  200. h00A4 24A4
  201. lx0ABGI-ORIGINlx06POINT?lx0APOINT-INT?lx08TESTARGSlx06%POINTlx05%DISPlx0B%SYMB-BORNElx01Xlx01Ylx05POINTlx02XYlx02DXlx02DYlx02DUn
  202. x0ABGI-ORIGIN
  203. x06POINT?
  204. x0APOINT-INT?
  205. x08TESTARGS
  206. x06%POINT
  207. x05%DISP
  208. x0B%SYMB-BORNE
  209. x01X
  210. x01Y
  211. x05POINT
  212. x02XY
  213. x02DX
  214. x02DY
  215. x02DU
  216. x17USER-GLOBAL-ENVIRONMENT
  217. x0F*PCS-BGI-ERROR*
  218. x0ESET-DISTANCES!
  219. x10SET-COORDINATES!
  220. x0CSET-POINT?-!
  221. x0ASET-WORLD!
  222. x0ERESTORE-WORLD!
  223. x0BCLOSE-GRAPH
  224. x0CDETECT-GRAPH
  225. x0EGRAPH-DEFAULTS
  226. x0EGET-GRAPH-MODE
  227. x0EGET-MODE-RANGE
  228. x0AINIT-GRAPH
  229. x13INSTALL-USER-DRIVER
  230. x11INSTALL-USER-FONT
  231. x10RESTORE-CRT-MODE
  232. x0ESET-GRAPH-MODE
  233. x0ESET-WRITE-MODE
  234. x03ARC
  235. x06CIRCLE
  236. x09DRAW-POLY
  237. x07ELLIPSE
  238. x0EGET-ARC-COORDS
  239. x10GET-ASPECT-RATIO
  240. x11GET-LINE-SETTINGS
  241. x04LINE
  242. x08LINE-REL
  243. x07LINE-TO
  244. x07MOVE-TO
  245. x08MOVE-REL
  246. x09RECTANGLE
  247. x10SET-ASPECT-RATIO
  248. x0ESET-LINE-STYLE
  249. x03BAR
  250. x06BAR-3D
  251. x0CFILL-ELLIPSE
  252. x09FILL-POLY
  253. x0AFLOOD-FILL
  254. x10GET-FILL-PATTERN
  255. x11GET-FILL-SETTINGS
  256. x09PIE-SLICE
  257. x06SECTOR
  258. x10SET-FILL-PATTERN
  259. x0ESET-FILL-STYLE
  260. x0CCLEAR-DEVICE
  261. x0FSET-ACTIVE-PAGE
  262. x0FSET-VISUAL-PAGE
  263. x0ECLEAR-VIEWPORT
  264. x11GET-VIEW-SETTINGS
  265. x0CSET-VIEWPORT
  266. x09GET-IMAGE
  267. x0AIMAGE-SIZE
  268. x09PUT-IMAGE
  269. x09GET-PIXEL
  270. x09PUT-PIXEL
  271. x11GET-TEXT-SETTINGS
  272. x08OUT-TEXT
  273. x0BOUT-TEXT-XY
  274. x10SET-TEXT-JUSTIFY
  275. x0ESET-TEXT-STYLE
  276. x12SET-USER-CHAR-SIZE
  277. x09TEXT-SIZE
  278. x0CGET-BK-COLOR
  279. x09GET-COLOR
  280. x13GET-DEFAULT-PALETTE
  281. x0DGET-MAX-COLOR
  282. x0BGET-PALETTE
  283. x10GET-PALETTE-SIZE
  284. x0FSET-ALL-PALETTE
  285. x0CSET-BK-COLOR
  286. x09SET-COLOR
  287. x0BSET-PALETTE
  288. x0FSET-RGB-PALETTE
  289. x0FGRAPH-ERROR-MSG
  290. x0CGRAPH-RESULT
  291. x0FGET-DRIVER-NAME
  292. x0CGET-MAX-MODE
  293. x0AGET-MAX-XY
  294. x0DGET-MODE-NAME
  295. x06GET-XY
  296. x06MODE-L
  297. x0FBGI-ENVIRONMENT
  298. x14*PCS-GRAPHICS-ERROR*
  299. x16%ERROR-INVALID-OPERAND
  300. lx05BORNEn
  301. x05BORNE
  302. x09%INT-LIST
  303. x08INTEGER?
  304. x07NUMBER?
  305. x07STRING?
  306. x05%BOOL
  307. x07COLOR-L
  308. x05%POLY
  309. x08CLOSURE?
  310. x08SELECTOR
  311. x06OFFSET
  312. x06FACTOR
  313. lx08SELECTORlx05BT-RTn
  314. x05BT-RT
  315. lx06OFFSETn
  316. lx03ENDn
  317. x03END
  318. lx06FACTORn
  319. x0BWORLD-COORD
  320. x08X-FACTOR
  321. x08X-OFFSET
  322. x08Y-FACTOR
  323. x08Y-OFFSET
  324. lx05UP-LTlx05BT-RTn
  325. x05UP-LT
  326. lx06XY-MAXn
  327. x06XY-MAX
  328. lx08X-OFFSETn
  329. lx08X-FACTORn
  330. lx08Y-OFFSETn
  331. lx08Y-FACTORn
  332. x0DWORLD-INVERSE
  333. x06FONT-L
  334. x08DIRECT-L
  335. x08POS-PROC
  336. lx08POS-PROCn
  337. x10COMPUTE-DISTANCE
  338. x07HORIZ-L
  339. x06VERT-L
  340. lx08SELECTORlx05BT-RTn
  341. lx06OFFSETn
  342. lx03ENDn
  343. lx06FACTORn
  344. x0EWORLD-DISTANCE
  345. lx08POS-PROCn
  346. x16COMPUTE-UNARY-DISTANCE
  347. lx08SELECTORlx05BT-RTn
  348. lx06OFFSETn
  349. lx03ENDn
  350. lx06FACTORn
  351. x14WORLD-UNARY-DISTANCE
  352. x07PMODE-L
  353. x03CAR
  354. x03CDR
  355. x0BFULL-SCREEN
  356. x08DRIVER-L
  357. x11%SYSTEM-FILE-NAME
  358. s0000
  359. x0CSPLIT-SCREEN
  360. x06FILL-L
  361. x07WMODE-L
  362. x03MAP
  363. x06LINE-L
  364. x07WIDTH-L
  365. t▌<u <I<<í <&<K■<ç    <à    
  366. <â
  367.  <!
  368.   <ñ  
  369. <ó 
  370. <T
  371. <╚ ▄ <╤<┤<ÿ<O<û< <<≥<·< <▀ <╦<«<`<m  <è !<v!"<X"#<>#$<│$%<
  372. %&<&'<"'(<I()<: )*<-!*+<'"+,<d",-<ô!-.<I!./<Z /0<o01<
  373. 12<∞23<╬34<45< 56<G67<╪78<╗89<╤9:<δ:;<═;<<;<=<9=><>?<╧?@<è@A<┤AB<)BC<▒CD<5DE<
  374. EF<╘ FG<* GH<t
  375. HI<c    IJ<eJK<√KL<╜LM<ƒMN<üNO<cOP<EPQ<'QR<    RS<"ST<τTU<äUV<°VW<WX<ÖXY<äYZ<fZ[<H[\<*\]<']^<^;^4Qx╫ 5] 4   44Qx_`█Z0
  376. ╫; ç " ; l  "A ;a@ b5 ▌cd < O ;çê $ & ] "  dê  $
  377. d@];; ; ;e<O;ê $  ï " @ ç " A α ; ; ;\4Qx╫;[4Qx╫;Z4Qx╫;Qx╫;X 4 04Qx ╫ ;fO;gO;hO; d $ d; ;i<▐ O;     (W(440à 0{ 0q $ $4
  378. Qdj `█ Z0!■ $╫ $;O;ê $ - ï " !@4 "
  379.  A  ╨ ; ; ; V444 4      Q d j`█Z0n²j`█Z0V² ╫  ;!C U 4   44Qdj`█Z0²╫;k<¬ O;T 4   44Qdj`█Z0¡ⁿ╫;lO;ï"LDB  4"<.■A 5 a@ D b 5 ; q j A j@ q9ï"@ç"    Aç;;;ï"@ë"    Aë;;; a▄ ; " D e " B;A Φ ;S 4 0ⁿ4Qd ╫ ;@¢;A¢;4    4O;m4 nR  oS  ¢; ▌pm qm4▌rnqm4▌stQx╫m4t nR  U ▌u o v <ü ;R4Qd╫;Q4Qd╫;P4Qd╫;O4Qd╫;N4Qd╫;M4Qd╫;L 4 0ç√4Qx╫@ QP╫P AQP╫PO    4@ 4@R 4A 4ARO;;@ wS  xP A yS zP O;▌{|q Q x╫ ▌} ~|@▌xq@xR~@U▌Çw|A▌üz qA  (z$ R$((~A((U$(▌é$y(â(<l ; K4 O O 4  Q P@A@A╫  ;    J 44 4 0╝∙ 4QPä`█Z0n°à `█ Z0V°╫;@  ¢;A  ¢;@ @P AAPO å4å4 ⁿ Rⁿⁿ;▌çåê<╣ ; I4 4  4  4  Q P ë`█Z0ë≈è`█Z0q≈ ╫  ;m4oS¢; ▌ïm qm4▌înqm4▌ìtQx╫m4t nR  U ▌Ä o Å <é ; H40╣°0Ω≈ 4  Q P 4    4 ╫  ;¢;@ P AO å4å4 ⁿ Rⁿⁿ;▌Éåæ<┬ ;G 4 0Q≈4QP ╫ ; oS  ¢; ▌Æm qm4▌ônqm4▌ötQx╫m4t nR  U ▌ò o û <Æ ;F4QP╫@ ä`█ Z 0ù∙ C à`█Z0|∙INë`█Z0Y∙EIè `█ Z0;∙xO O O ;QxY4╫;     40°0°0° 4
  380. x O 
  381. ; E40I÷4 4 
  382. Q < 4    4j `█ Z0⌠ ╫  ;     40+≈0!≈0≈ 4     xO     0é√0x√0² 4ⁿqⁿⁿ;D 4 0,⌡4    Q<4    4 ╫ ; 4 0L÷4  ;    C 40½⌠0▄≤ 4  4Q<4    4 ù$`█ $ Z0Z≥ ╫ ; 40⌠0⌠ 4 4ÿ 0»÷Ö 0ƒ÷0(° 4ÿ 0o·Ö 0_·ÿ 0Ö√ 4 EO ⁿqⁿⁿ; B40F≤0<≤ 4  Q < 4    44    4 ╫  ; 4 
  383.  x  O  O      O  O  O   @   AEE@CI  @$$C((I,,0╬≤0─≤0║≤0░≤0ª≤    0£≤
  384. 0Æ≤  4 000000    00 00 0    0
  385. 0
  386. 0; A40╞±0╝± 4  Q < 4    44    4 ╫  ;4Q╫Ü54Q╫@ ¢`█ Z 0X≤ A O ;    @ 4ë" " 0╓≡0╠≡0≡ 4Q<4    44    4( ╫ (;4Q╫;4Q╫;"@   4  ë "  ò    44 Q  ¢`█Z0≈φ ╫  ;?4Q<╫@ 4 C  4I x O ;>4Q<╫;= 4 0áε4Q< ╫ ;"@ A " C   E"I  £¥4  440+ε 4Q¢ `█ Z0╨∞ _$`█ $ Z0╕∞ ╫ ₧5< 4 0⌐φ4Q< ╫ ; 4 0ëφ4` ╦ Q╫O ¢`█ZO ¢▄ ╦;;4Q<╫; :4  4 4 4 
  387. Q ( ƒ`█Z0⌐δj`█Z0æδ ╫  ; 4 0¢∞4` ╦ Q╫O ä`█ZO ä▄ ╦; 940Çδ4 4      Q ( j`█Z0╒Ω ╫  ;4Q╫Ü5"@ 
  388. 4 4 44     Q  _`█Z0]Ω ╫ ₧5     (8(40∞03δ0)δ4$ $4Q(4    4   4 $ò$$((
  389. 4 ,ò,($ ╫ ($,;  4  4 4
  390. Qá`█Z0FΘ╫;     (7(40δ0!Ω0Ω0Ω$ $4Q(4    4   4 $ò$( ╫ ($;     (!(40TΩ0uΘ0kΘ0iΘ$ $4 Q4    4$$ 4 (ò(,$ ╫ $,( í5 64Q(╫@ ƒ`█ Z 0╘δ A O ; "40wΘ0áΦ 4  Q  4    4 4 ò ╫  ;54Q(╫; 440∞Φ0
  391. Φ 4  Q ( 4    4 ╫  ;# 4 0₧Θ4Q
  392. í 4 ╫;3 4 0^Θ4Q(
  393. í 4 ╫;     ($(40÷τ0τ0
  394. τ4$ $4 Q4    4$$ 4 (ò((,,
  395. 4 0ò0,($ ╫ $,(0 í5  2403τ4 4  Q ( 4    4 4 ò
  396. 4 ò ╫  ;%4 Q╫ í5 &4Q╫;'4Q╫@ ó`█ Z 0₧Φ C  Iú`█Z0{Φ x O ;     (1(4ë" " 0≡σ0µσ0σ0/σ 4Q(4    44    4,0O,040($ ╫ $(0; (40Dσ0:σ 4  Q  4    44    4 ╫  ; 040╞Σ0╝Σ 4  Q ( 4    44    4 ╫  ;) 4 0PΣ4Qx╫ 4 Q   4 
  397. 4  ╫  ;    / 4 4 0√Γ 4  4Qó`█Z0ƒßú `█ Z0çß╫;* 4 0Rπ4    Q4    4 ╫ ;. 4  O   4
  398. Q @ A╫ ; -40├Γ0╣Γ 4  Q  4    44    4 ╫  ;+ 4 0MΓ4
  399. Q4    4 ╫ ;, 4   44Qx╫ 4 Q   4 
  400. 4  ╫  ;
  401. z
  402. h0002 000C
  403. x04CODE
  404. x13CREATE-SCHEME-MACRO
  405. t 5 
  406. z
  407. h0002 000C
  408. x07CONTROL
  409. x13CREATE-SCHEME-MACRO
  410. t 5 
  411. z
  412. h0002 000C
  413. x07DRAWING
  414. x13CREATE-SCHEME-MACRO
  415. t 5 
  416. z
  417. h0002 000C
  418. x07FILLING
  419. x13CREATE-SCHEME-MACRO
  420. t 5 
  421. z
  422. h0002 000C
  423. x07WINDOWS
  424. x13CREATE-SCHEME-MACRO
  425. t 5 
  426. z
  427. h0002 000C
  428. x07TEXTCHR
  429. x13CREATE-SCHEME-MACRO
  430. t 5 
  431. z
  432. h0002 000C
  433. x07PALETTE
  434. x13CREATE-SCHEME-MACRO
  435. t 5 
  436. z
  437. h0002 000C
  438. x07QUERIES
  439. x13CREATE-SCHEME-MACRO
  440. t 5 
  441. z
  442.